home *** CD-ROM | disk | FTP | other *** search
Text File | 1998-11-20 | 2.0 KB | 68 lines | [TEXT/ttxt] |
- <!--
- navmenu.tpl 2.0.2/a for release 2.0.2
- Enables: folder navigation menu
-
- This file contains templates to create a folder navigation menu in HTML.
- To install these templates, add the entire #Include line below to the end
- of your webx.tpl file (create the file if it doesn't exist).
- -->
-
- <!--#Include File="navmenu.tpl"-->
-
- <!--
- To display the menu, place the following line(s) in your site banner, or a folder banner,
- or a customized discussion or folder template, or anywhere else you want it:
-
- %% set _folder ".ee..." %%
- %% use nav_menu %%
-
- Include the "set _folder" line only if you want the menu to display the folders
- within a specific folder. ".ee..." must be the ID of a folder at your site.
-
- Note that if you place this in a folder banner, and you want the usual
- site banner to appear there as well, you will have to duplicate the site
- banner code in the folder banner.
-
- Templates defined herein:
- nav_menu, folder_list: generate HTML menu
- go_folder: handle menu selection
- -->
-
-
- %% macro nav_menu %%
- <form method=post action="%%urlBase%%go_folder@%%certificate%%@">
- 現在地: <select name=where onChange="form.submit()">
- %% if !pathIsFolder %%%% setPathToParent %%%% endif %%
- <option value="%%location%%" selected>%%pathTitle%%
- %% if !_folder %%%% set _folder "/" %%%% endif %%
- %% use folder_list %%
- %% setPath %%
- </select><input type=submit value=次へ></form>
- %% endmacro %%
-
-
- %% macro folder_list %%
- %% setPath(_folder) %%
- <option value="%%location%%">%%_indent%%%%pathTitle%%
- %% set _lists pathSelect("type=f") & " end " & _lists %%
- %% set _folder _lists.split %%
- %% while _folder != "end" %%
- %% if _folder %%
- %% set _indent "-- " & _indent %%
- %% use folder_list %%
- %% set _junk _indent.split %%
- %% endif %%
- %% set _folder _lists.split %%
- %% endwhile %%
- %% endmacro %%
-
-
- %% macro go_folder %%
- %% setPath(form.where) %%
- HTTP/1.0 302 Redirect%% crlf %%
- Location: http%% if siteIsSecure %%s%% endif %%://%%siteHost%%
- %%urlBase%%14@%%alwaysCertificate%%@%%location%%%% crlf %%%% crlf %%
- %% endmacro %%
-
-
-